Top 10k strings from Splash (19xx)(-).z80
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [Z80] /
Back to the directory listing
2 TOTE=TOTE+1 2 PLAY2=PLAY2+1 2 PLAY1=PLAY1+1 2 ;"PRESS ANY KEY TO CONTINUE": 1 x8 88D<8D 1 TOTE>BEST 1 SELECT HIGEST SCORING MOVE 1 PLAY2>PLAY1 1 PLAY1>PLAY2 1 PLAY1+PLAY2=49 1 MOVE TO NEXT UNIT 1 MAIN ROUTINE TO CHECK COLOUR CHANGES 1 INSTRUCTIONS 1 FORCE CAPS LOCK 1 END OF GAME ROUTINE 1 D DD x88x8 1 D DD D@@D@ 1 CHECK POSIBLE SCORES FOR COMPUTERS MOVE 1 BEST=TOTE: 1 A$="SPLASH!": 1 @D DDD<0DD 1 <DD UUDxxDD@D 1 ;"when playing against the"; 1 ;"to the following scheme:-"; 1 ;"time to decide the best move."; 1 ;"those surrounding it.": 1 ;"those by one step." 1 ;"they change "; 1 ;"the sixteen squares around"; 1 ;"the object of the game is to"; 1 ;"the most difficult."; 1 ;"the end of a move, it is then"; 1 ;"the computer will take some" 1 ;"squares is the winner."; 1 ;"square. " 1 ;"opponent."; 1 ;"on a seven by seven board and" 1 ;"moving player." 1 ;"its colour by three steps"; 1 ;"increased by two steps and"; 1 ;"in further moves." 1 ;"in any free (ie uncaptured)"; 1 ;"for two players. It is played"; 1 ;"end of the move are captured"; 1 ;"computer. Level three is"; 1 ;"captured and initialled by the"; 1 ;"capture twenty five or more" 1 ;"capture more squares than your"; 1 ;"black. As the game progresses"; 1 ;"at any time press KEY Q when"; 1 ;"asked 'letter?'." 1 ;"around it have their colours" 1 ;"and cannot be played on"; 1 ;"You take it in turns to play"; 1 ;"What level do you wish 1-3)": 1 ;"Thus, the first player to"; 1 ;"This is a brand new board game" 1 ;"Thinking! please be patient" 1 ;"There are three levels of play"; 1 ;"The winner is" 1 ;"The eight squares immediately"; 1 ;"SPLASH!"; 1 ;"Press any key for another game": 1 ;"Playing in a square increases"; 1 ;"Playing in a square affects"; 1 ;"Player 2" 1 ;"Player 1" 1 ;"PRESS ANY KEY TO PLAY": 1 ;"PLAYER 2" 1 ;"PLAYER 1"; 1 ;"PLAYER ";PL;" " 1 ;"PLAYER ";PL+1 1 ;"My move is "; 1 ;"Initially, all squares are"; 1 ;"If you wish to quit the game"; 1 ;"If a square is left white at"; 1 ;"INVALID SPLASH": 1 ;"How many players 1 or 2 ?": 1 ;"GOOD LUCK"; 1 ;"By a landslide!" 1 ;"By a good margin" 1 ;"By a close shave" 1 ;"At all levels of difficulty"; 1 ;"Any squares left white at the"; 1 ;" WILL START FIRST": 1 +y);" ";x: 1 (PLAY1-PLAY2)=2 1 (PLAY1-PLAY2)=1 1 (PLAY1-PLAY2) 1 "colour according"; 1 "NUMBER ?";P$: 1 "LETTER ?";I$: 1 SET VARIABLES AND ARRAYS 1 SET UP UDG 1 SET UP SCREEN 1 REQUEST MOVE 1 PRINT SCORE 1 PRINT NEW SPLASH 1 IF UNIT TAKEN THEN MOVE ON 1 CHANGE COLOUR OF UNITS AROUND SELECTED UNIT